home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-01 / corew222.zip / GEMINI.WAR < prev    next >
Text File  |  1990-07-28  |  188b  |  13 lines
  1. ;GEMINI (self-cloning)
  2. dat     0
  3. dat     99
  4. mov     @-2     @-1
  5. cmp     -3      #9
  6. jmp     4
  7. add     #1      -5
  8. add     #1      -5
  9. jmp     -5
  10. mov     #99     93
  11. jmp     93
  12. end
  13.